﻿Public Class Pohon

    Public Function countWalet()
        Return Me.Controls.OfType(Of Walet).Count()
    End Function

    Sub start()
        For xCountElm As Integer = 0 To Me.Controls.OfType(Of Walet).Count() - 1
            Me.Controls.OfType(Of Walet).ElementAt(xCountElm).start()
        Next
    End Sub

    Sub stopTimer()
        For xCountElm As Integer = 0 To Me.Controls.OfType(Of Walet).Count() - 1
            Me.Controls.OfType(Of Walet).ElementAt(xCountElm).stopTimer()
        Next
    End Sub

    Private Sub Walet6_Load(sender As Object, e As EventArgs) Handles Walet6.Load

    End Sub
End Class
